；运行需要一点时间
#集 = 【】
当 #序：1，#序 小于等于 10000，#序 自加 1 ｛
    #是素数 ： 真
    当 #除数：2，#除数 小于等于 #序 / 2，#除数 自加 1 ｛
        如果 #序 % #除数 等于 0 ｛
            #是素数 = 假
        ｝
    ｝
    如果 #是素数 ｛
        @追加【#集，#序】
    ｝
｝
@显示、#集